inherited frmCadSocred: TfrmCadSocred
  Left = 313
  Top = 107
  Width = 914
  Height = 583
  Caption = 'Socred - Cr'#233'dito de ICMS'
  OldCreateOrder = True
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  inherited pgcCadastro: TcxPageControl
    Width = 906
    Height = 530
    ClientRectBottom = 530
    ClientRectRight = 906
    inherited tbsLista: TcxTabSheet
      inherited Panel1: TPanel
        Width = 906
        Height = 75
        OnExit = Panel1Exit
        object Label1: TLabel
          Left = 6
          Top = 4
          Width = 29
          Height = 13
          Caption = 'Filtro'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -12
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold, fsUnderline]
          ParentFont = False
        end
        object cbProdutor: TcxDBLookupComboBox
          Left = 5
          Top = 38
          DataBinding.DataField = 'PRODUTOR'
          DataBinding.DataSource = dsFiltro
          Properties.CharCase = ecUpperCase
          Properties.KeyFieldNames = 'CODIGO'
          Properties.ListColumns = <
            item
              FieldName = 'NOME'
            end>
          Properties.ListSource = dsProdutor
          TabOrder = 0
          Width = 272
        end
        object cxLabel2: TcxLabel
          Left = 5
          Top = 21
          Caption = 'Produtor'
          Transparent = True
        end
        object cxLabel6: TcxLabel
          Left = 278
          Top = 21
          Caption = 'Propriedade'
          Transparent = True
        end
        object cbPropriedade: TcxDBLookupComboBox
          Left = 278
          Top = 38
          DataBinding.DataField = 'PROPRIEDADE'
          DataBinding.DataSource = dsFiltro
          Properties.CharCase = ecUpperCase
          Properties.KeyFieldNames = 'CODIGO'
          Properties.ListColumns = <
            item
              FieldName = 'NOME'
            end>
          Properties.ListSource = dsPropriedade
          TabOrder = 1
          Width = 272
        end
        object cbStatus: TcxComboBox
          Left = 731
          Top = 37
          Properties.Items.Strings = (
            'Impressa'
            'Pendente')
          TabOrder = 4
          Text = 'Status'
          Width = 121
        end
        object cxDBDateEdit2: TcxDBDateEdit
          Left = 551
          Top = 37
          DataBinding.DataField = 'DATA1'
          DataBinding.DataSource = dsFiltro
          TabOrder = 2
          Width = 88
        end
        object cxLabel16: TcxLabel
          Left = 551
          Top = 21
          Caption = 'Dt. Incial'
          Transparent = True
        end
        object cxDBDateEdit1: TcxDBDateEdit
          Left = 641
          Top = 37
          DataBinding.DataField = 'DATA2'
          DataBinding.DataSource = dsFiltro
          TabOrder = 3
          Width = 88
        end
        object cxLabel17: TcxLabel
          Left = 641
          Top = 21
          Caption = 'Dt. Final'
          Transparent = True
        end
        object cxLabel1: TcxLabel
          Left = 731
          Top = 21
          Caption = 'Status'
          Transparent = True
        end
      end
      inherited frmTreePadrao: TPanel
        Top = 75
        Width = 906
        Height = 455
        object Grid: TcxGrid
          Left = 0
          Top = 0
          Width = 906
          Height = 455
          Align = alClient
          TabOrder = 0
          object GridDBTableView1: TcxGridDBTableView
            OnDblClick = GridDBTableView1DblClick
            OnKeyDown = GridDBTableView1KeyDown
            NavigatorButtons.ConfirmDelete = False
            NavigatorButtons.Insert.Visible = False
            NavigatorButtons.Append.Enabled = False
            NavigatorButtons.Delete.Visible = False
            NavigatorButtons.Edit.Visible = False
            NavigatorButtons.Post.Visible = False
            NavigatorButtons.Cancel.Visible = False
            NavigatorButtons.Refresh.Enabled = False
            NavigatorButtons.Refresh.Visible = False
            NavigatorButtons.SaveBookmark.Enabled = False
            NavigatorButtons.SaveBookmark.Visible = False
            NavigatorButtons.GotoBookmark.Visible = False
            DataController.DataSource = dsRegistro
            DataController.KeyFieldNames = 'CODIGO'
            DataController.Summary.DefaultGroupSummaryItems = <>
            DataController.Summary.FooterSummaryItems = <>
            DataController.Summary.SummaryGroups = <>
            OptionsBehavior.IncSearch = True
            OptionsBehavior.NavigatorHints = True
            OptionsCustomize.ColumnHiding = True
            OptionsData.CancelOnExit = False
            OptionsData.Deleting = False
            OptionsData.DeletingConfirmation = False
            OptionsData.Editing = False
            OptionsData.Inserting = False
            OptionsSelection.CellSelect = False
            OptionsSelection.InvertSelect = False
            OptionsSelection.UnselectFocusedRecordOnExit = False
            OptionsView.Footer = True
            OptionsView.FooterAutoHeight = True
            OptionsView.GroupFooters = gfAlwaysVisible
            OptionsView.Indicator = True
            Preview.Visible = True
            object GridDBTableView1SELECIONADA: TcxGridDBColumn
              DataBinding.FieldName = 'SELECIONADA'
              PropertiesClassName = 'TcxCheckBoxProperties'
              Properties.ValueChecked = 'S'
              Properties.ValueUnchecked = 'N'
            end
            object GridDBTableView1IMP_SOCRED: TcxGridDBColumn
              DataBinding.FieldName = 'IMP_SOCRED'
              PropertiesClassName = 'TcxCheckBoxProperties'
              Properties.ValueChecked = 'S'
              Properties.ValueUnchecked = 'N'
              Width = 24
            end
            object GridDBTableView1CODIGO: TcxGridDBColumn
              DataBinding.FieldName = 'CODIGO'
            end
            object GridDBTableView1CONTA: TcxGridDBColumn
              DataBinding.FieldName = 'CONTA'
            end
            object GridDBTableView1VALOR: TcxGridDBColumn
              DataBinding.FieldName = 'VALOR'
              Width = 47
            end
            object GridDBTableView1HISTORICO: TcxGridDBColumn
              DataBinding.FieldName = 'HISTORICO'
            end
            object GridDBTableView1BASE_CALC: TcxGridDBColumn
              DataBinding.FieldName = 'BASE_CALC'
            end
            object GridDBTableView1ALIQUOTA: TcxGridDBColumn
              DataBinding.FieldName = 'ALIQUOTA'
            end
            object GridDBTableView1DESTACADO: TcxGridDBColumn
              DataBinding.FieldName = 'DESTACADO'
            end
            object GridDBTableView1CREDITO: TcxGridDBColumn
              DataBinding.FieldName = 'CREDITO'
            end
            object GridDBTableView1NUMERO: TcxGridDBColumn
              DataBinding.FieldName = 'NUMERO'
            end
            object GridDBTableView1SERIE: TcxGridDBColumn
              DataBinding.FieldName = 'SERIE'
            end
            object GridDBTableView1DT_EMISSAO: TcxGridDBColumn
              DataBinding.FieldName = 'DT_EMISSAO'
            end
            object GridDBTableView1DT_DOCTO: TcxGridDBColumn
              DataBinding.FieldName = 'DT_DOCTO'
            end
            object GridDBTableView1OPERACAO: TcxGridDBColumn
              DataBinding.FieldName = 'OPERACAO'
            end
            object GridDBTableView1PROPRIEDADE: TcxGridDBColumn
              DataBinding.FieldName = 'PROPRIEDADE'
            end
            object GridDBTableView1PRODUTOR: TcxGridDBColumn
              DataBinding.FieldName = 'PRODUTOR'
            end
            object GridDBTableView1TERCEIRO: TcxGridDBColumn
              DataBinding.FieldName = 'TERCEIRO'
            end
            object GridDBTableView1NFP: TcxGridDBColumn
              DataBinding.FieldName = 'NFP'
            end
            object GridDBTableView1COD_HISTORICO: TcxGridDBColumn
              DataBinding.FieldName = 'COD_HISTORICO'
            end
            object GridDBTableView1NOME_PRODUTOR: TcxGridDBColumn
              DataBinding.FieldName = 'NOME_PRODUTOR'
            end
            object GridDBTableView1NOME_PROPRIEDADE: TcxGridDBColumn
              DataBinding.FieldName = 'NOME_PROPRIEDADE'
            end
            object GridDBTableView1NOME_OPERACAO: TcxGridDBColumn
              DataBinding.FieldName = 'NOME_OPERACAO'
            end
            object GridDBTableView1NOME_PLANO: TcxGridDBColumn
              DataBinding.FieldName = 'NOME_PLANO'
            end
            object GridDBTableView1NOME_TERCEIRO: TcxGridDBColumn
              DataBinding.FieldName = 'NOME_TERCEIRO'
            end
            object GridDBTableView1HISTORICO_PADRAO: TcxGridDBColumn
              DataBinding.FieldName = 'HISTORICO_PADRAO'
            end
            object GridDBTableView1MES: TcxGridDBColumn
              DataBinding.FieldName = 'MES'
            end
          end
          object GridLevel1: TcxGridLevel
            GridView = GridDBTableView1
          end
        end
      end
    end
  end
  inherited cxImageList1: TcxImageList
    FormatVersion = 1
  end
  inherited GridPopupMenu: TcxGridPopupMenu
    Grid = Grid
  end
  inherited cxPropertiesStore: TcxPropertiesStore
    Components = <
      item
        Component = Grid
        Properties.Strings = (
          'Align'
          'Anchors'
          'BevelEdges'
          'BevelInner'
          'BevelKind'
          'BevelOuter'
          'BevelWidth'
          'BorderStyle'
          'BorderWidth'
          'Constraints'
          'Cursor'
          'DragCursor'
          'DragKind'
          'DragMode'
          'DragOpening'
          'DragOpeningWaitTime'
          'Enabled'
          'Font'
          'Height'
          'HelpContext'
          'HelpKeyword'
          'HelpType'
          'Hint'
          'Left'
          'LevelTabs'
          'LookAndFeel'
          'Name'
          'ParentFont'
          'PopupMenu'
          'RootLevelOptions'
          'RootLevelStyles'
          'TabOrder'
          'TabStop'
          'Tag'
          'Top'
          'Visible'
          'Width')
      end
      item
        Component = GridDBTableView1
        Properties.Strings = (
          'BackgroundBitmaps'
          'DataController'
          'DateTimeHandling'
          'DragMode'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FilterBox'
          'Filtering'
          'FilterRow'
          'Name'
          'NavigatorButtons'
          'NewItemRow'
          'OptionsBehavior'
          'OptionsCustomize'
          'OptionsData'
          'OptionsSelection'
          'OptionsView'
          'PopupMenu'
          'Preview'
          'Styles'
          'Synchronization'
          'Tag')
      end
      item
        Component = GridDBTableView1ALIQUOTA
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBTableView1BASE_CALC
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBTableView1COD_HISTORICO
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBTableView1CODIGO
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBTableView1CONTA
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBTableView1CREDITO
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBTableView1DESTACADO
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBTableView1DT_DOCTO
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBTableView1DT_EMISSAO
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBTableView1HISTORICO
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBTableView1HISTORICO_PADRAO
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBTableView1IMP_SOCRED
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBTableView1MES
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBTableView1NFP
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBTableView1NOME_OPERACAO
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBTableView1NOME_PLANO
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBTableView1NOME_PRODUTOR
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBTableView1NOME_PROPRIEDADE
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBTableView1NOME_TERCEIRO
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBTableView1NUMERO
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBTableView1OPERACAO
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBTableView1PRODUTOR
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBTableView1PROPRIEDADE
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBTableView1SERIE
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBTableView1TERCEIRO
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end
      item
        Component = GridDBTableView1VALOR
        Properties.Strings = (
          'AlternateCaption'
          'BestFitMaxWidth'
          'Caption'
          'DataBinding'
          'DateTimeGrouping'
          'FakeComponentLink1'
          'FakeComponentLink2'
          'FakeComponentLink3'
          'FooterAlignmentHorz'
          'GroupIndex'
          'GroupSummaryAlignment'
          'HeaderAlignmentHorz'
          'HeaderAlignmentVert'
          'HeaderGlyph'
          'HeaderGlyphAlignmentHorz'
          'HeaderGlyphAlignmentVert'
          'MinWidth'
          'Name'
          'Options'
          'Properties'
          'PropertiesClassName'
          'RepositoryItem'
          'SortIndex'
          'SortOrder'
          'Styles'
          'Summary'
          'Tag'
          'Visible'
          'VisibleForCustomization'
          'Width')
      end>
    Left = 368
    Top = 360
  end
  inherited ActionList1: TActionList
    inherited ActContrair: TAction
      OnExecute = ActContrairExecute
    end
    inherited ActExpandir: TAction
      OnExecute = ActExpandirExecute
    end
    inherited ActExportar: TAction
      OnExecute = ActExportarExecute
    end
    inherited ActConfigurar: TAction
      OnExecute = ActConfigurarExecute
    end
    inherited ActImprimir: TAction
      OnExecute = ActImprimirExecute
    end
    inherited ActConfigRel: TAction
      OnExecute = ActConfigRelExecute
    end
    object ActSeleciona: TAction
      Caption = 'Selecionar Registro'
      OnExecute = ActSelecionaExecute
    end
  end
  inherited dtEdit: TIBDataSet
    RefreshSQL.Strings = (
      
        'select nf.*, p1.nome nome_produtor, p2.nome nome_propriedade, op' +
        '.nome nome_operacao, pl.nome nome_plano,'
      'p3.nome nome_terceiro, h.descricao historico_padrao,'
      
        '(extract (month from nf.dt_docto)||'#39'/'#39'||extract (year from nf.dt' +
        '_docto)) mes from nota_fiscal nf'
      'left join produtores p1 on (p1.codigo = nf.produtor)'
      'left join propriedade p2 on (p2.codigo = nf.propriedade)'
      'left join operacoes op on (op.codigo = nf.operacao)'
      'left join plano_conta pl on (op.codigo = nf.conta)'
      'left join produtores p3 on (p3.codigo = nf.terceiro)'
      'left join historico h on (h.codigo = nf.cod_historico)'
      'WHERE OP.gera_credito_icms = '#39'S'#39
      'and ((nf.propriedade = :propriedade) or (:propriedade = 0))'
      'and ((nf.produtor = :produtor) or (:produtor = 0))'
      'and (nf.dt_docto between :data1 and :data2)'
      'and  ((nf.imp_socred = :status) or (:status = '#39' '#39'))')
    SelectSQL.Strings = (
      
        'select nf.*, p1.nome nome_produtor, p2.nome nome_propriedade, op' +
        '.nome nome_operacao, pl.nome nome_plano,'
      'p3.nome nome_terceiro, h.descricao historico_padrao,'
      
        '(extract (month from nf.dt_docto)||'#39'/'#39'||extract (year from nf.dt' +
        '_docto)) mes from nota_fiscal nf'
      'left join produtores p1 on (p1.codigo = nf.produtor)'
      'left join propriedade p2 on (p2.codigo = nf.propriedade)'
      'left join operacoes op on (op.codigo = nf.operacao)'
      'left join plano_conta pl on (op.codigo = nf.conta)'
      'left join produtores p3 on (p3.codigo = nf.terceiro)'
      'left join historico h on (h.codigo = nf.cod_historico)'
      'WHERE OP.gera_credito_icms = '#39'S'#39
      'and ((nf.propriedade = :propriedade) or (:propriedade = 0))'
      'and ((nf.produtor = :produtor) or (:produtor = 0))'
      'and (nf.dt_docto between :data1 and :data2)')
    ModifySQL.Strings = (
      'update nota_fiscal'
      'set'
      '  SELECIONADA = :SELECIONADA'
      'where'
      '  CODIGO = :OLD_CODIGO')
    Left = 608
    Top = 348
    object dtEditCODIGO: TIntegerField
      DisplayLabel = 'C'#243'digo'
      FieldName = 'CODIGO'
      Origin = '"NOTA_FISCAL"."CODIGO"'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object dtEditCONTA: TIntegerField
      DisplayLabel = 'C'#243'd. Conta'
      FieldName = 'CONTA'
      Origin = '"NOTA_FISCAL"."CONTA"'
    end
    object dtEditVALOR: TIBBCDField
      DisplayLabel = 'Valor'
      FieldName = 'VALOR'
      Origin = '"NOTA_FISCAL"."VALOR"'
      Precision = 18
      Size = 2
    end
    object dtEditHISTORICO: TMemoField
      DisplayLabel = 'Hist'#243'rico'
      FieldName = 'HISTORICO'
      Origin = '"NOTA_FISCAL"."HISTORICO"'
      ProviderFlags = [pfInUpdate]
      BlobType = ftMemo
      Size = 8
    end
    object dtEditBASE_CALC: TIBBCDField
      DisplayLabel = 'Base Calc.'
      FieldName = 'BASE_CALC'
      Origin = '"NOTA_FISCAL"."BASE_CALC"'
      Precision = 18
      Size = 2
    end
    object dtEditALIQUOTA: TIBBCDField
      DisplayLabel = 'Aliquota'
      FieldName = 'ALIQUOTA'
      Origin = '"NOTA_FISCAL"."ALIQUOTA"'
      Precision = 18
      Size = 2
    end
    object dtEditDESTACADO: TIBBCDField
      DisplayLabel = 'Destacado'
      FieldName = 'DESTACADO'
      Origin = '"NOTA_FISCAL"."DESTACADO"'
      Precision = 18
      Size = 2
    end
    object dtEditCREDITO: TIBBCDField
      DisplayLabel = 'Cr'#233'dito'
      FieldName = 'CREDITO'
      Origin = '"NOTA_FISCAL"."CREDITO"'
      Precision = 18
      Size = 2
    end
    object dtEditNUMERO: TIBStringField
      DisplayLabel = 'Numero'
      FieldName = 'NUMERO'
      Origin = '"NOTA_FISCAL"."NUMERO"'
    end
    object dtEditSERIE: TIBStringField
      DisplayLabel = 'Serie'
      FieldName = 'SERIE'
      Origin = '"NOTA_FISCAL"."SERIE"'
    end
    object dtEditDT_EMISSAO: TDateField
      DisplayLabel = 'Dt. Emiss'#227'o'
      FieldName = 'DT_EMISSAO'
      Origin = '"NOTA_FISCAL"."DT_EMISSAO"'
    end
    object dtEditDT_DOCTO: TDateField
      DisplayLabel = 'Dt. Docto'
      FieldName = 'DT_DOCTO'
      Origin = '"NOTA_FISCAL"."DT_DOCTO"'
    end
    object dtEditOPERACAO: TIntegerField
      DisplayLabel = 'C'#243'd. Opera'#231#227'o'
      FieldName = 'OPERACAO'
      Origin = '"NOTA_FISCAL"."OPERACAO"'
    end
    object dtEditPROPRIEDADE: TIntegerField
      DisplayLabel = 'C'#243'd. Propriedade'
      FieldName = 'PROPRIEDADE'
      Origin = '"NOTA_FISCAL"."PROPRIEDADE"'
    end
    object dtEditPRODUTOR: TIntegerField
      DisplayLabel = 'C'#243'd. Produtor'
      FieldName = 'PRODUTOR'
      Origin = '"NOTA_FISCAL"."PRODUTOR"'
    end
    object dtEditTERCEIRO: TIntegerField
      DisplayLabel = 'C'#243'd. Terceiro'
      FieldName = 'TERCEIRO'
      Origin = '"NOTA_FISCAL"."TERCEIRO"'
    end
    object dtEditNFP: TIntegerField
      FieldName = 'NFP'
      Origin = '"NOTA_FISCAL"."NFP"'
    end
    object dtEditCOD_HISTORICO: TIntegerField
      DisplayLabel = 'C'#243'd. Hist'#243'rico'
      FieldName = 'COD_HISTORICO'
      Origin = '"NOTA_FISCAL"."COD_HISTORICO"'
    end
    object dtEditIMP_SOCRED: TIBStringField
      DisplayLabel = 'Imp. Socred'
      FieldName = 'IMP_SOCRED'
      Origin = '"NOTA_FISCAL"."IMP_SOCRED"'
      FixedChar = True
      Size = 1
    end
    object dtEditNOME_PRODUTOR: TIBStringField
      DisplayLabel = 'Produtor'
      FieldName = 'NOME_PRODUTOR'
      Origin = '"PRODUTORES"."NOME"'
      Size = 50
    end
    object dtEditNOME_PROPRIEDADE: TIBStringField
      DisplayLabel = 'Propriedade'
      FieldName = 'NOME_PROPRIEDADE'
      Origin = '"PROPRIEDADE"."NOME"'
      Size = 50
    end
    object dtEditNOME_OPERACAO: TIBStringField
      DisplayLabel = 'Opera'#231#227'o'
      FieldName = 'NOME_OPERACAO'
      Origin = '"OPERACOES"."NOME"'
      Size = 50
    end
    object dtEditNOME_PLANO: TIBStringField
      DisplayLabel = 'Plano de Conta'
      FieldName = 'NOME_PLANO'
      Origin = '"PLANO_CONTA"."NOME"'
      Size = 50
    end
    object dtEditNOME_TERCEIRO: TIBStringField
      DisplayLabel = 'Terceiro'
      FieldName = 'NOME_TERCEIRO'
      Origin = '"PRODUTORES"."NOME"'
      Size = 50
    end
    object dtEditHISTORICO_PADRAO: TIBStringField
      DisplayLabel = 'Hist'#243'rico'
      FieldName = 'HISTORICO_PADRAO'
      Origin = '"HISTORICO"."DESCRICAO"'
      Size = 50
    end
    object dtEditMES: TIBStringField
      DisplayLabel = 'M'#234's'
      FieldName = 'MES'
      ProviderFlags = []
      Size = 13
    end
    object dtEditSELECIONADA: TIBStringField
      DisplayLabel = 'X'
      FieldName = 'SELECIONADA'
      Origin = '"NOTA_FISCAL"."SELECIONADA"'
      FixedChar = True
      Size = 1
    end
  end
  inherited dsRegistro: TDataSource
    Left = 608
    Top = 380
  end
  inherited dxBarManager: TdxBarManager
    Categories.ItemsVisibles = (
      2
      2)
    Categories.Visibles = (
      True
      True)
    DockControlHeights = (
      0
      0
      0
      26)
  end
  object edtRel: TIBDataSet [9]
    Database = dmPrincipal.Database
    Transaction = dmPrincipal.Transaction
    DeleteSQL.Strings = (
      'delete from impressoes_configuraveis'
      'where'
      '  CODIGO = :OLD_CODIGO')
    InsertSQL.Strings = (
      'insert into impressoes_configuraveis'
      '  (CODIGO, CODIGO2, REL_SOCRED)'
      'values'
      '  (:CODIGO, :CODIGO2, :REL_SOCRED)')
    RefreshSQL.Strings = (
      'Select * '
      'from impressoes_configuraveis '
      'where'
      '  CODIGO = :CODIGO')
    SelectSQL.Strings = (
      
        'select p.codigo, p.REL_SOCRED, p.codigo2 from impressoes_configu' +
        'raveis p'
      'where p.codigo = :codigo')
    ModifySQL.Strings = (
      'update impressoes_configuraveis'
      'set'
      '  CODIGO = :CODIGO,'
      '  CODIGO2 = :CODIGO2,'
      '  REL_SOCRED = :REL_SOCRED'
      'where'
      '  CODIGO = :OLD_CODIGO')
    GeneratorField.Field = 'CODIGO'
    GeneratorField.Generator = 'GEN_ENDERECOS_ID'
    GeneratorField.ApplyEvent = gamOnPost
    Active = True
    Left = 576
    Top = 480
    object edtRelCODIGO: TIntegerField
      FieldName = 'CODIGO'
      Origin = '"IMPRESSOES_CONFIGURAVEIS"."CODIGO"'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object edtRelCODIGO2: TIBStringField
      FieldName = 'CODIGO2'
      Origin = '"IMPRESSOES_CONFIGURAVEIS"."CODIGO2"'
      FixedChar = True
      Size = 1
    end
    object edtRelREL_SOCRED: TMemoField
      FieldName = 'REL_SOCRED'
      Origin = '"IMPRESSOES_CONFIGURAVEIS"."REL_SOCRED"'
      ProviderFlags = [pfInUpdate]
      BlobType = ftMemo
      Size = 8
    end
  end
  object dtEditRel: TDataSource [10]
    DataSet = edtRel
    Left = 576
    Top = 448
  end
  object ppLayoutRel: TppDBPipeline [11]
    DataSource = dtEditRel
    UserName = 'ppEditRel'
    Left = 576
    Top = 419
    object ppLayoutRelppField1: TppField
      Alignment = taRightJustify
      FieldAlias = 'CODIGO'
      FieldName = 'CODIGO'
      FieldLength = 0
      DataType = dtInteger
      DisplayWidth = 0
      Position = 0
    end
    object ppLayoutRelppField2: TppField
      FieldAlias = 'CODIGO2'
      FieldName = 'CODIGO2'
      FieldLength = 1
      DisplayWidth = 1
      Position = 1
    end
    object ppLayoutRelppField3: TppField
      FieldAlias = 'REL_SOCRED'
      FieldName = 'REL_SOCRED'
      FieldLength = 8
      DataType = dtMemo
      DisplayWidth = 10
      Position = 2
      Searchable = False
      Sortable = False
    end
  end
  object Designer_Rel: TppDesigner [12]
    AllowDataSettingsChange = True
    Caption = 'Configurar DAP'
    DataSettings.SessionType = 'BDESession'
    DataSettings.AllowEditSQL = False
    DataSettings.DatabaseType = dtInterBase
    DataSettings.GuidCollationType = gcString
    DataSettings.IsCaseSensitive = True
    DataSettings.SQLType = sqSQL2
    DataSettings.UseDataDictionary = True
    Position = poScreenCenter
    Report = rptRel
    IniStorageType = 'IniFile'
    IniStorageName = '($WINSYS)\RBuilder.ini'
    WindowHeight = 400
    WindowLeft = 100
    WindowTop = 50
    WindowWidth = 600
    WindowState = wsMaximized
    Left = 576
    Top = 387
  end
  object rptRel: TppReport [13]
    AutoStop = False
    DataPipeline = ppRel
    PassSetting = psTwoPass
    PrinterSetup.BinName = 'Default'
    PrinterSetup.DocumentName = 'Report'
    PrinterSetup.Orientation = poLandscape
    PrinterSetup.PaperName = 'A4'
    PrinterSetup.PrinterName = 'Default'
    PrinterSetup.mmMarginBottom = 6350
    PrinterSetup.mmMarginLeft = 6350
    PrinterSetup.mmMarginRight = 6350
    PrinterSetup.mmMarginTop = 6350
    PrinterSetup.mmPaperHeight = 210000
    PrinterSetup.mmPaperWidth = 297000
    PrinterSetup.PaperSize = 9
    Template.DatabaseSettings.DataPipeline = ppLayoutRel
    Template.DatabaseSettings.NameField = 'CODIGO2'
    Template.DatabaseSettings.TemplateField = 'REL_SOCRED'
    Template.FileName = 'C:\Documents and Settings\Fabiano\Desktop\ConfigSocred.rtm'
    Template.SaveTo = stDatabase
    Template.Format = ftASCII
    Units = utMillimeters
    DeviceType = 'Screen'
    OutlineSettings.CreateNode = True
    OutlineSettings.CreatePageNodes = True
    OutlineSettings.Enabled = True
    OutlineSettings.Visible = True
    PreviewFormSettings.WindowState = wsMaximized
    PreviewFormSettings.ZoomSetting = zs100Percent
    TextSearchSettings.DefaultString = '<FindText>'
    TextSearchSettings.Enabled = True
    Left = 544
    Top = 387
    Version = '9.01'
    mmColumnWidth = 197379
    DataPipelineName = 'ppRel'
    object ppTitleBand6: TppTitleBand
      PrintHeight = phDynamic
      mmBottomOffset = 0
      mmHeight = 32015
      mmPrintPosition = 0
      object ppLabel1: TppLabel
        UserName = 'Label1'
        Border.BorderPositions = []
        Border.Color = clBlack
        Border.Style = psSolid
        Border.Visible = False
        Border.Weight = 1.000000000000000000
        Caption = 'SOCRED MANO'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial'
        Font.Size = 10
        Font.Style = [fsBold]
        Transparent = True
        mmHeight = 4191
        mmLeft = 120386
        mmTop = 13229
        mmWidth = 26712
        BandType = 1
      end
      object ppDBText1: TppDBText
        UserName = 'DBText1'
        Border.BorderPositions = []
        Border.Color = clBlack
        Border.Style = psSolid
        Border.Visible = False
        Border.Weight = 1.000000000000000000
        DataField = 'NOME'
        DataPipeline = ppRel
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial'
        Font.Size = 10
        Font.Style = [fsBold]
        Transparent = True
        DataPipelineName = 'ppRel'
        mmHeight = 4233
        mmLeft = 9525
        mmTop = 14552
        mmWidth = 40746
        BandType = 1
      end
      object ppLabel2: TppLabel
        UserName = 'Label2'
        Border.BorderPositions = []
        Border.Color = clBlack
        Border.Style = psSolid
        Border.Visible = False
        Border.Weight = 1.000000000000000000
        Caption = 'Razao Social'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial'
        Font.Size = 10
        Font.Style = [fsBold]
        Transparent = True
        mmHeight = 4233
        mmLeft = 9525
        mmTop = 9790
        mmWidth = 21696
        BandType = 1
      end
    end
    object ppHeaderBand1: TppHeaderBand
      PrintHeight = phDynamic
      mmBottomOffset = 0
      mmHeight = 14288
      mmPrintPosition = 0
      object ppSubReport1: TppSubReport
        UserName = 'SubReport1'
        ExpandAll = False
        NewPrintJob = False
        OutlineSettings.CreateNode = True
        TraverseAllData = False
        DataPipelineName = 'ppSub1'
        mmHeight = 5027
        mmLeft = 0
        mmTop = 1058
        mmWidth = 284300
        BandType = 0
        mmBottomOffset = 0
        mmOverFlowOffset = 0
        mmStopPosition = 0
        object ppChildReport1: TppChildReport
          AutoStop = False
          DataPipeline = ppSub1
          PrinterSetup.BinName = 'Default'
          PrinterSetup.DocumentName = 'Report'
          PrinterSetup.Orientation = poLandscape
          PrinterSetup.PaperName = 'A4'
          PrinterSetup.PrinterName = 'Default'
          PrinterSetup.mmMarginBottom = 6350
          PrinterSetup.mmMarginLeft = 6350
          PrinterSetup.mmMarginRight = 6350
          PrinterSetup.mmMarginTop = 6350
          PrinterSetup.mmPaperHeight = 210000
          PrinterSetup.mmPaperWidth = 297000
          PrinterSetup.PaperSize = 9
          Template.DatabaseSettings.DataPipeline = ppLayoutRel
          Template.DatabaseSettings.NameField = 'CODIGO2'
          Template.DatabaseSettings.TemplateField = 'REL_SOCRED'
          Template.SaveTo = stDatabase
          Template.Format = ftASCII
          Units = utMillimeters
          Version = '9.01'
          mmColumnWidth = 0
          DataPipelineName = 'ppSub1'
          object ppTitleBand1: TppTitleBand
            mmBottomOffset = 0
            mmHeight = 17992
            mmPrintPosition = 0
            object ppLabel3: TppLabel
              UserName = 'Label3'
              Border.BorderPositions = []
              Border.Color = clBlack
              Border.Style = psSolid
              Border.Visible = False
              Border.Weight = 1.000000000000000000
              Caption = 'Numero'
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clBlack
              Font.Name = 'Arial'
              Font.Size = 10
              Font.Style = [fsBold]
              Transparent = True
              mmHeight = 4191
              mmLeft = 2646
              mmTop = 3440
              mmWidth = 13293
              BandType = 1
            end
            object ppDBText3: TppDBText
              UserName = 'DBText3'
              Border.BorderPositions = []
              Border.Color = clBlack
              Border.Style = psSolid
              Border.Visible = False
              Border.Weight = 1.000000000000000000
              DataField = 'NUMERO'
              DataPipeline = ppSub1
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clBlack
              Font.Name = 'Arial'
              Font.Size = 10
              Font.Style = [fsBold]
              Transparent = True
              DataPipelineName = 'ppSub1'
              mmHeight = 4233
              mmLeft = 6085
              mmTop = 10583
              mmWidth = 17198
              BandType = 1
            end
          end
          object ppDetailBand1: TppDetailBand
            mmBottomOffset = 0
            mmHeight = 5556
            mmPrintPosition = 0
          end
          object ppSummaryBand1: TppSummaryBand
            mmBottomOffset = 0
            mmHeight = 0
            mmPrintPosition = 0
          end
        end
      end
      object ppSubReport2: TppSubReport
        UserName = 'SubReport2'
        ExpandAll = False
        NewPrintJob = False
        OutlineSettings.CreateNode = True
        ShiftRelativeTo = ppSubReport1
        TraverseAllData = False
        DataPipelineName = 'ppSub2'
        mmHeight = 5027
        mmLeft = 0
        mmTop = 7408
        mmWidth = 284300
        BandType = 0
        mmBottomOffset = 0
        mmOverFlowOffset = 0
        mmStopPosition = 0
        object ppChildReport2: TppChildReport
          AutoStop = False
          DataPipeline = ppSub2
          PrinterSetup.BinName = 'Default'
          PrinterSetup.DocumentName = 'Report'
          PrinterSetup.Orientation = poLandscape
          PrinterSetup.PaperName = 'A4'
          PrinterSetup.PrinterName = 'Default'
          PrinterSetup.mmMarginBottom = 6350
          PrinterSetup.mmMarginLeft = 6350
          PrinterSetup.mmMarginRight = 6350
          PrinterSetup.mmMarginTop = 6350
          PrinterSetup.mmPaperHeight = 210000
          PrinterSetup.mmPaperWidth = 297000
          PrinterSetup.PaperSize = 9
          Template.DatabaseSettings.DataPipeline = ppLayoutRel
          Template.DatabaseSettings.NameField = 'CODIGO2'
          Template.DatabaseSettings.TemplateField = 'REL_SOCRED'
          Template.SaveTo = stDatabase
          Template.Format = ftASCII
          Units = utMillimeters
          Version = '9.01'
          mmColumnWidth = 0
          DataPipelineName = 'ppSub2'
          object ppTitleBand2: TppTitleBand
            mmBottomOffset = 0
            mmHeight = 13229
            mmPrintPosition = 0
            object ppDBText2: TppDBText
              UserName = 'DBText2'
              Border.BorderPositions = []
              Border.Color = clBlack
              Border.Style = psSolid
              Border.Visible = False
              Border.Weight = 1.000000000000000000
              DataField = 'TIPO_CREDITO'
              DataPipeline = ppSub2
              Font.Charset = DEFAULT_CHARSET
              Font.Color = clBlack
              Font.Name = 'Arial'
              Font.Size = 10
              Font.Style = [fsBold]
              Transparent = True
              DataPipelineName = 'ppSub2'
              mmHeight = 4233
              mmLeft = 17727
              mmTop = 3440
              mmWidth = 17198
              BandType = 1
            end
          end
          object ppDetailBand2: TppDetailBand
            mmBottomOffset = 0
            mmHeight = 5556
            mmPrintPosition = 0
          end
          object ppSummaryBand3: TppSummaryBand
            mmBottomOffset = 0
            mmHeight = 0
            mmPrintPosition = 0
          end
        end
      end
    end
    object ppDetailBand30: TppDetailBand
      PrintHeight = phDynamic
      mmBottomOffset = 0
      mmHeight = 0
      mmPrintPosition = 0
    end
    object ppFooterBand5: TppFooterBand
      mmBottomOffset = 0
      mmHeight = 0
      mmPrintPosition = 0
    end
    object ppSummaryBand2: TppSummaryBand
      PrintHeight = phDynamic
      mmBottomOffset = 0
      mmHeight = 0
      mmPrintPosition = 0
    end
    object ppParameterList1: TppParameterList
    end
  end
  object ppRel: TppDBPipeline [14]
    DataSource = dsRelatorio
    UserName = 'Rel'
    Left = 448
    Top = 419
  end
  object ppSub1: TppDBPipeline [15]
    DataSource = dsSub1
    UserName = 'Sub1'
    Left = 481
    Top = 419
  end
  object lstSub2: TIBQuery [16]
    Database = dmPrincipal.Database
    Transaction = dmPrincipal.Transaction
    SQL.Strings = (
      
        'select nf.valor, nf.base_calc, nf.aliquota, nf.destacado, nf.cre' +
        'dito, (select max(prd.tipo_insumo) FROM nota_fiscal_item nfi'
      
        '                                                                ' +
        '       inner join produtos prd on (prd.codigo = nfi.produto)'
      
        '                                                                ' +
        '        where nfi.nota_fiscal = nf.codigo) TIPO_CREDITO'
      'from nota_fiscal nf'
      'where nf.selecionada = '#39'S'#39' and nf.propriedade = :propriedade'
      'order by nf.numero')
    Left = 515
    Top = 451
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'propriedade'
        ParamType = ptUnknown
      end>
    object lstSub2VALOR: TIBBCDField
      FieldName = 'VALOR'
      Origin = '"NOTA_FISCAL"."VALOR"'
      Precision = 18
      Size = 2
    end
    object lstSub2BASE_CALC: TIBBCDField
      FieldName = 'BASE_CALC'
      Origin = '"NOTA_FISCAL"."BASE_CALC"'
      Precision = 18
      Size = 2
    end
    object lstSub2ALIQUOTA: TIBBCDField
      FieldName = 'ALIQUOTA'
      Origin = '"NOTA_FISCAL"."ALIQUOTA"'
      Precision = 18
      Size = 2
    end
    object lstSub2DESTACADO: TIBBCDField
      FieldName = 'DESTACADO'
      Origin = '"NOTA_FISCAL"."DESTACADO"'
      Precision = 18
      Size = 2
    end
    object lstSub2CREDITO: TIBBCDField
      FieldName = 'CREDITO'
      Origin = '"NOTA_FISCAL"."CREDITO"'
      Precision = 18
      Size = 2
    end
    object lstSub2TIPO_CREDITO: TIBStringField
      FieldName = 'TIPO_CREDITO'
      ProviderFlags = []
      FixedChar = True
      Size = 1
    end
  end
  object dsSub2: TDataSource [17]
    DataSet = lstSub2
    Left = 515
    Top = 483
  end
  object lstSub1: TIBQuery [18]
    Database = dmPrincipal.Database
    Transaction = dmPrincipal.Transaction
    SQL.Strings = (
      
        'select nf.numero, nf.serie, nf.dt_emissao, t.nome emitente, t.rg' +
        ', et.uf  from nota_fiscal nf'
      'left join produtores t on (nf.terceiro = t.codigo)'
      'left join enderecos e on (t.codigo = e.produtor)'
      'left join cidades cdd on (e.cidade = cdd.codigo)'
      'left join estados et on (cdd.estado = et.codigo)'
      'where nf.selecionada = '#39'S'#39' and nf.propriedade = :propriedade'
      'order by nf.numero')
    Left = 483
    Top = 451
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'propriedade'
        ParamType = ptUnknown
      end>
    object lstSub1NUMERO: TIBStringField
      FieldName = 'NUMERO'
      Origin = '"NOTA_FISCAL"."NUMERO"'
    end
    object lstSub1SERIE: TIBStringField
      FieldName = 'SERIE'
      Origin = '"NOTA_FISCAL"."SERIE"'
    end
    object lstSub1DT_EMISSAO: TDateField
      FieldName = 'DT_EMISSAO'
      Origin = '"NOTA_FISCAL"."DT_EMISSAO"'
    end
    object lstSub1EMITENTE: TIBStringField
      FieldName = 'EMITENTE'
      Origin = '"PRODUTORES"."NOME"'
      Size = 50
    end
    object lstSub1RG: TIBStringField
      FieldName = 'RG'
      Origin = '"PRODUTORES"."RG"'
    end
    object lstSub1UF: TIBStringField
      FieldName = 'UF'
      Origin = '"ESTADOS"."UF"'
      FixedChar = True
      Size = 2
    end
  end
  object dsSub1: TDataSource [19]
    DataSet = lstSub1
    Left = 483
    Top = 483
  end
  object dsRelatorio: TDataSource [20]
    DataSet = lstRelatorio
    Left = 451
    Top = 483
  end
  object lstRelatorio: TIBQuery [21]
    Database = dmPrincipal.Database
    Transaction = dmPrincipal.Transaction
    SQL.Strings = (
      
        'select p.nome, pp.complemento endereco, pp.nome propriedade, pp.' +
        'insc_estadual,'
      'cdd.nome cidade, cdd2.nome domicilio, t.fone  from produtores p'
      'left join propriedade pp on (p.codigo = pp.produtor)'
      'left join cidades cdd on (pp.cidade = cdd.codigo)'
      
        'left join enderecos e on (p.codigo = e.produtor and e.padrao = '#39 +
        'S'#39')'
      
        'left join telefones t on (p.codigo = t.produtor and t.padrao = '#39 +
        'S'#39')'
      'left join logradouros lgd on (e.logradouro = lgd.codigo)'
      'left join cidades cdd2 on (pp.domicilio_fiscal = cdd2.codigo)'
      'where pp.codigo = :propriedade')
    Left = 451
    Top = 451
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'propriedade'
        ParamType = ptUnknown
      end>
    object lstRelatorioNOME: TIBStringField
      FieldName = 'NOME'
      Origin = '"PRODUTORES"."NOME"'
      Size = 50
    end
    object lstRelatorioENDERECO: TIBStringField
      FieldName = 'ENDERECO'
      Origin = '"PROPRIEDADE"."COMPLEMENTO"'
      Size = 50
    end
    object lstRelatorioPROPRIEDADE: TIBStringField
      FieldName = 'PROPRIEDADE'
      Origin = '"PROPRIEDADE"."NOME"'
      Size = 50
    end
    object lstRelatorioINSC_ESTADUAL: TIBStringField
      FieldName = 'INSC_ESTADUAL'
      Origin = '"PROPRIEDADE"."INSC_ESTADUAL"'
    end
    object lstRelatorioCIDADE: TIBStringField
      FieldName = 'CIDADE'
      Origin = '"CIDADES"."NOME"'
      Size = 50
    end
    object lstRelatorioDOMICILIO: TIBStringField
      FieldName = 'DOMICILIO'
      Origin = '"CIDADES"."NOME"'
      Size = 50
    end
    object lstRelatorioFONE: TIBStringField
      FieldName = 'FONE'
      Origin = '"TELEFONES"."FONE"'
    end
  end
  object ppSub2: TppDBPipeline [22]
    DataSource = dsSub2
    UserName = 'Sub2'
    Left = 515
    Top = 419
  end
  object UPDNFSocred: TIBSQL [23]
    Database = dmPrincipal.Database
    SQL.Strings = (
      
        'update nota_fiscal nf set nf.imp_socred = '#39'S'#39', nf.selecionada = ' +
        #39'N'#39' where nf.selecionada = '#39'S'#39)
    Transaction = dmPrincipal.Transaction
    Left = 638
    Top = 348
  end
  object dsFiltro: TDataSource [24]
    DataSet = mtbFiltro
    Left = 472
    Top = 36
  end
  object dsPropriedade: TDataSource [25]
    DataSet = lstPropriedade
    Left = 672
    Top = 464
  end
  object lstPropriedade: TIBQuery [26]
    Database = dmPrincipal.Database
    Transaction = dmPrincipal.Transaction
    SQL.Strings = (
      
        'select pp.codigo, coalesce(pp.insc_estadual,'#39#39')||'#39' ( '#39'||coalesce' +
        '(pp.nome,'#39#39')||'#39' )'#39' nome from propriedade pp'
      'where pp.produtor = :codigo'
      '')
    Left = 672
    Top = 432
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'codigo'
        ParamType = ptUnknown
      end>
    object lstPropriedadeCODIGO: TIntegerField
      FieldName = 'CODIGO'
      Origin = '"PROPRIEDADE"."CODIGO"'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object lstPropriedadeNOME: TIBStringField
      FieldName = 'NOME'
      ProviderFlags = []
      Size = 75
    end
  end
  object lstProdutores: TIBQuery [27]
    Database = dmPrincipal.Database
    Transaction = dmPrincipal.Transaction
    SQL.Strings = (
      'select p.codigo, p.nome from produtores p'
      'where p.produtor = '#39'S'#39' and p.ativo = '#39'S'#39)
    Left = 640
    Top = 432
    object lstProdutoresCODIGO: TIntegerField
      FieldName = 'CODIGO'
      Origin = '"PRODUTORES"."CODIGO"'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object lstProdutoresNOME: TIBStringField
      FieldName = 'NOME'
      Origin = '"PRODUTORES"."NOME"'
      Size = 50
    end
  end
  object dsProdutor: TDataSource [28]
    DataSet = lstProdutores
    Left = 640
    Top = 464
  end
  object lstParametro: TIBQuery [29]
    Database = dmPrincipal.Database
    Transaction = dmPrincipal.Transaction
    BeforeOpen = lstParametroBeforeOpen
    SQL.Strings = (
      'select * from parametros p'
      'where p.usuario = :usuario')
    Left = 672
    Top = 338
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'usuario'
        ParamType = ptUnknown
      end>
    object lstParametroCODIGO: TIntegerField
      FieldName = 'CODIGO'
      Origin = '"PARAMETROS"."CODIGO"'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object lstParametroUSUARIO: TIntegerField
      FieldName = 'USUARIO'
      Origin = '"PARAMETROS"."USUARIO"'
    end
    object lstParametroDATA_MOVTO: TDateField
      FieldName = 'DATA_MOVTO'
      Origin = '"PARAMETROS"."DATA_MOVTO"'
    end
    object lstParametroOPERACAO: TIntegerField
      FieldName = 'OPERACAO'
      Origin = '"PARAMETROS"."OPERACAO"'
    end
    object lstParametroPRODUTOR: TIntegerField
      FieldName = 'PRODUTOR'
      Origin = '"PARAMETROS"."PRODUTOR"'
    end
    object lstParametroTERCEIRO: TIntegerField
      FieldName = 'TERCEIRO'
      Origin = '"PARAMETROS"."TERCEIRO"'
    end
    object lstParametroPROPRIEDADE: TIntegerField
      FieldName = 'PROPRIEDADE'
      Origin = '"PARAMETROS"."PROPRIEDADE"'
    end
    object lstParametroPRODUTO: TIntegerField
      FieldName = 'PRODUTO'
      Origin = '"PARAMETROS"."PRODUTO"'
    end
    object lstParametroANO_BASE: TIntegerField
      FieldName = 'ANO_BASE'
      Origin = '"PARAMETROS"."ANO_BASE"'
    end
  end
  object ACBrEnterTab1: TACBrEnterTab [30]
    EnterAsTab = True
    Left = 558
    Top = 65535
  end
  object mtbFiltro2: TdxMemData [31]
    Indexes = <>
    SortOptions = []
    Left = 472
    Top = 8
    object mtbFiltro2PRODUTOR: TIntegerField
      FieldName = 'PRODUTOR'
      OnChange = mtbFiltro2PRODUTORChange
    end
    object mtbFiltro2PROPRIEDADE: TIntegerField
      FieldName = 'PROPRIEDADE'
    end
    object mtbFiltro2DATA1: TDateField
      FieldName = 'DATA1'
    end
    object mtbFiltro2DATA2: TDateTimeField
      FieldName = 'DATA2'
    end
    object mtbFiltro2STATUS: TStringField
      FieldName = 'STATUS'
    end
  end
  object mtbFiltro: TdxMemData [32]
    Indexes = <>
    SortOptions = []
    Left = 416
    Top = 8
    object mtbFiltroPRODUTOR: TIntegerField
      FieldName = 'PRODUTOR'
    end
    object mtbFiltroPROPRIEDADE: TIntegerField
      FieldName = 'PROPRIEDADE'
    end
    object mtbFiltroANO_BASE: TIntegerField
      FieldName = 'ANO_BASE'
    end
    object mtbFiltroDATA1: TDateField
      FieldName = 'DATA1'
    end
    object mtbFiltroDATA2: TDateField
      FieldName = 'DATA2'
    end
    object mtbFiltroSTATUS: TStringField
      FieldName = 'STATUS'
    end
  end
end
